Top 10k strings from Watson (1983)(J. Branegan).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
2 V$,W$,A2,A3: 2 M(n)=M(n)*(1 2 ;" "; 1 watson l^ 1 ew Choice ";J$ 1 ales ",52 1 Your Station Lat Long next line 1 W3=W2-W1+.001 1 W2=LONG/RCN: 1 W1=W9/RCN: 1 V$,W$,A3,A4: 1 U(n)=T7-12 1 U$="0 " 1 T8=(S(n)-T6)/W(n) 1 T7=T0-T(n)/2 1 T7=T0+T(n)/2 1 T7=T(n)/W(n) 1 T5=(T5-CH5)*6 1 T(n)=(-.26 1 S(n)=T7+12 1 R$="Shortpath": 1 R$="Longpath " 1 Q$,W$,A1,A2: 1 P$="Mod Prob 25%" 1 P$="Hi Prob 60%" 1 M(n)=M9*.75 1 LSD=LSD-360 1 L2=LAT/RCN: 1 K9>(J9*1.27 1 IZ BIBLIOTEKE YU1OYA 1 I(n)=H(n)* 1 H(n)=V(n)*G(n)*( 1 G3=(T6-S(n))/(T(n)/2 1 G2=G2*M(n)*(1 1 Callsign page 1 BAND<(J9*1.27 1 <fff,350.5 1 ;"Sunspot No. ";S0 1 ;"Propagation to ";U$;" month ";MN 1 ;"Propagation at ";X$(2 1 ;"Please Select Entry format " 1 ;"CALLSIGN CHOICE " 1 ;"AZ ";HH9 1 ;"3. WHO IS ON ? " 1 ;"2. WOTSON 4 hours "; 1 ;"1. WOTSON 24 hours "; 1 ;"1 1 1 1 1 2 2" 1 ;"0 2 4 6 8 0 2 4 6 8 0 2 utc" 1 ;"0 4hr8 12 16 20 24" 1 ;" HF PROPAGATION PREDICTION " 1 ;" GM4IHJ wishes you lots of good DX and listening pleasure" 1 ;" Author J Branegan 8 Whitehills Saline Fife Scotland UK ";"derived from Devereux and Wilkinson Radio Communications March 1983" 1 333*(V(n)^8 1 33,"BV","Taiwan ",23 1 -Y9*Y9)/Y9)*180 1 -W0*W0)/W0)+ 1 -T(n)*T(n))))*24 1 -HH9*HH9)/HH9)+ 1 -H1*H1)/H1)+ 1 -G1)+W1-.001 1 -C9*C9)/C9)+ 1 ,"ZV","Brazil ",-23 1 ,"ZS1",-32 1 ,"ZS","SAfrica",-32 1 ,"ZP","Paraguy",-35 1 ,"ZM","Toklaus",-10 1 ,"ZL1D","Krmdc",-30 1 ,"ZL1C","Chtam",-44 1 ,"ZL1B","Cbell",-52 1 ,"ZL1A","Aukld",-51 1 ,"ZL","NZealnd",-41 1 ,"ZL ",-41 1 ,"ZK2","Niue ",-19 1 ,"ZK1A","Mhiki",-10 1 ,"ZK1","Cook I",-21 1 ,"ZF","Cayman ",19 1 ,"ZD9","Tristn",-38 1 ,"ZD8","Ascnsn",-8 1 ,"ZD7","StHlna",-16 1 ,"ZA","Albania",41 1 ,"Z22","Zimbwe",-20 1 ,"YV0","Aves I",12 1 ,"YV","Venzula",10 1 ,"YU","Yugoslv",43 1 ,"YS","Salvdor",14 1 ,"YO","Rumania",45 1 ,"YN","Nicrgua",12 1 ,"YL3","Russia",56 1 ,"YK","Syria ",35 1 ,"YI","Iraq ",33 1 ,"YB","Indnsia",-8 1 ,"YA","Afghans",35 1 ,"Y21","EGermn",52 1 ,"XZ","Burma ",22 1 ,"XW8","Laos ",17 1 ,"XV5","Vitnam",15 1 ,"XU","Cambdia",12 1 ,"XF4","Revila",19 1 ,"XE","Mexico ",20 1 ,"W9","IlWisIn",43 1 ,"W8","MichOhi",43 1 ,"W7","WashOre",45 1 ,"W6","Califor",38 1 ,"W5","TexMiss",33 1 ,"W4","FlGaVir",32 1 ,"W3","PenMdDC",40 1 ,"W2","ConNYNJ",41 1 ,"W1","MainVer",43 1 ,"W0","CoMoND ",39 1 ,"VU7A","Lcdvs",10 1 ,"VU7","Andman",13 1 ,"VU2","India ",20 1 ,"VS5","Brunei",5 1 ,"VR6","Pitcrn",-25 1 ,"VQ9","Chagos",3 1 ,"VP9","Bermda",32 1 ,"VP8","Flklnd",-52 1 ,"VP5","Turks ",21 1 ,"VP2V","Virgn",18 1 ,"VP2M","Mnsrt",17 1 ,"VP2K","StKit",17 1 ,"VP2A","Antga",17 1 ,"VP2","Leward",18 1 ,"VO2","Labrdr",55 1 ,"VO1","Nfdlnd",48 1 ,"VK9Z","Wilis",-16 1 ,"VK9Y","Cocos",-12 1 ,"VK9X","Xmas ",-10 1 ,"VK8","NorTer",-12 1 ,"VK7","Tasman",-43 1 ,"VK6","W Aust",-32 1 ,"VK5","S Aust",-30 1 ,"VK4","Queens",-25 1 ,"VK3","Victor",-38 1 ,"VK2A","LHowe",-32 1 ,"VK2",-34 1 ,"VK2","NewSoW",-34 1 ,"VK0","Antart",-67 1 ,"VE8","Yukon ",64 1 ,"VE7","BColum",49 1 ,"VE6","Albrta",51 1 ,"VE5","Saskat",51 1 ,"VE4","Mantob",50 1 ,"VE3","Tornto",43 1 ,"VE2","Quebec",47 1 ,"VE1","NScota",45 1 ,"V3","Belize ",17 1 ,"V2A","Anguil",18 1 ,"UZ4","Kuybsh",53 1 ,"UU2","Lithun",56 1 ,"UP2","Lithun",56 1 ,"UO5","Moldav",47 1 ,"UN1","Karelo",61 1 ,"UM8","Kirgiz",42 1 ,"UL7","Kazakh",48 1 ,"UJ8","Tadzik",38 1 ,"UI8","Uzbek ",42 1 ,"UH6","Turkmn",40 1 ,"UG6","Armnia",40 1 ,"UF6","Georga",42 1 ,"UD6","Azbjan",41 1 ,"UC2","W Russ",53 1 ,"UB5","Ukrain",48 1 ,"UA9","Asiatc",62 1 ,"UA2","Kaling",55 1 ,"UA1A","Fjosf",81 1 ,"UA1","Russia",56 1 ,"TZ","Mali Rp",12 1 ,"TY","Benin ",8 1 ,"TU2","IvoryC",6 1 ,"TT8","R Chad",12 1 ,"TR8","RGabon",-2 1 ,"TN8","RCongo",-2 1 ,"TL8","CAfRep",6 1 ,"TJ","Camroon",4 1 ,"TI9","CocosI",5 1 ,"TI","CstRica",10 1 ,"TG","Guatmla",15 1 ,"TF","Iceland",64 1 ,"TA","Turkey ",40 1 ,"T7","SMarino",44 1 ,"T5","Somalia",10 1 ,"T32","E Kimb",0 1 ,"T31","C Kimb",2 1 ,"SV9","Crete ",35 1 ,"SV5","Dodcns",37 1 ,"SV","Greece ",38 1 ,"SU","Egypt ",30 1 ,"ST","Sudan ",16 1 ,"SP","Poland ",52 1 ,"SM","Sweden ",59 1 ,"S9","Sao T+P",0 1 ,"S8","Transki",-26 1 ,"S7","Seychel",-5 1 ,"S2","Bangldh",24 1 ,"PY0B","Trind",-20 1 ,"PY0A","StP+P",1 1 ,"PY0","FdeNor",-4 1 ,"PY","Brazil ",-23 1 ,"PY ",-23 1 ,"PJ6","Saba I",17 1 ,"PJ5","StEust",17 1 ,"PJ4","Bonair",12 1 ,"PJ3","Aruba ",12 1 ,"PA","Holland",52 1 ,"P47","StMten",18 1 ,"P41","Neth A",12 1 ,"P29","Papua ",-5 1 ,"P2","Surinam",6 1 ,"OZ","Denmark",56 1 ,"OY","FaroesI",62 1 ,"OX","Greenld",64 1 ,"OR","Antarct",-70 1 ,"ON","Belguim",51 1 ,"OK","Czech ",50 1 ,"OJ0","M Reef",59 1 ,"OH0","AlandI",60 1 ,"OH","Finland",60 1 ,"OE","Austria",47 1 ,"OD5","Lebnon",34 1 ,"OA","Peru ",-12 1 ,"OA ",-12 1 ,"LZ","Bulgria",43 1 ,"LX","Lxmburg",49.8 1 ,"LU","Argntna",-35 1 ,"LU ",-35 1 ,"LA","Norway ",60 1 ,"KZ5","Panama",9 1 ,"KW6","Wake ",19 1 ,"KV4","Virgin",18 1 ,"KS6","Samoa ",-14 1 ,"KP4","P Rico",18 1 ,"KL7","Alaska",66 1 ,"KH7","Kure ",29 1 ,"KH6",21.5 1 ,"KH6","Hawaii",21.4 1 ,"KH5","Plmyra",6 1 ,"KH4","Midway",28 1 ,"KH3","Jhnson",17 1 ,"KH1","Baker ",0 1 ,"KG6","Guam ",13 1 ,"KG4","Guntmo",20 1 ,"KC6","Carlns",8 1 ,"KC4","antart",-89 1 ,"JY","Jordan ",32 1 ,"JX","J Mayen",71 1 ,"JW","Svlbard",78 1 ,"JR6","Oknawa",27 1 ,"JD1","ToriSh",30 1 ,"JA","Japan ",34 1 ,"J8","StVncnt",13 1 ,"J7","Domnica",15 1 ,"J6","StLucia",14 1 ,"J5","GBissau",12 1 ,"J2","Djbouti",12 1 ,"IT","Sicily ",38 1 ,"IS","Sardnia",40 1 ,"IH","Pantlra",37 1 ,"IG9","Lmpdsa",35.5 1 ,"IC","Capri ",40.8 1 ,"IA","TuscanI",43 1 ,"I","Italy ",42 1 ,"HV","Vatican",42 1 ,"HS","Thailnd",14 1 ,"HR0","SwanIs",17 1 ,"HR","Hondras",15 1 ,"HM","Korea ",37 1 ,"HK0","Prvdca",13 1 ,"HK","Colmbia",4.5 1 ,"HI","Domnica",18 1 ,"HH","Haiti ",19 1 ,"HG","Hungary",47 1 ,"HC8","Glpgos",0 1 ,"HC","Ecuador",-2 1 ,"HB0","Lctnst",47.1 1 ,"HB","Swiss ",47 1 ,"H5","Bphtswn",-28 1 ,"H4","Solmons",-10 1 ,"H31","Panama",9 1 ,"H2","SArabia",25 1 ,"GU","Guernsy",49.5 1 ,"GM","Scotlnd",56 1 ,"GJ","Jersey ",49 1 ,"GI","Nirelnd",54.5 1 ,"GD","Iof Man",54 1 ,"G ",51.5 1 ,"FW8","Guiana",4 1 ,"FS7","StMrtn",18 1 ,"FR7","Runion",-21 1 ,"FP8","Stpier",47 1 ,"FO8","Clpton",10 1 ,"FM7","Mrtniq",15 1 ,"FK8","Nu Cal",-22 1 ,"FH8","Mayote",-13 1 ,"FG7","Gdlupe",16 1 ,"FC","Corsica",42 1 ,"FB8Z","A+Spl",-38 1 ,"FB8Y","Anart",-67 1 ,"FB8X","Kglen",-49.5 1 ,"FB8W","Crozt",-46 1 ,"F","France ",49 1 ,"ET3","Ethpia",9 1 ,"EP","Iran ",36 1 ,"EI","Eire ",53 1 ,"EA9","SpShra",24 1 ,"EA8","Canary",28 1 ,"EA6","Bleric",40 1 ,"EA","Spain ",40.5 1 ,"DU","Philipn",15 1 ,"DM","EGerman",52 1 ,"DB","Germany",50 1 ,"D6","Comoro ",-12 1 ,"D4","C Verde",16 1 ,"D2A","Angola",-9 1 ,"CX","Uraguay",-35 1 ,"CT3","Madera",32.7 1 ,"CT2","Azores",38 1 ,"CR9","Macao ",22 1 ,"CP","Bolivia",-16.6 1 ,"CO","Cuba ",23 1 ,"CN","Morocco",32 1 ,"CE9AN","Shet",-62 1 ,"CE9AA","Antr",-64 1 ,"CE0Z","JFern",-34 1 ,"CE0X","Felix",-29 1 ,"CE0A","Eastr",-27 1 ,"CE","Chile ",-33 1 ,"C9M","Mozmbq",-26 1 ,"C6A","Bahama",26 1 ,"C5A","Gambia",13.3 1 ,"C31","Andora",42.5 1 ,"C21","Nauru ",0 1 ,"BY","China ",40 1 ,"A9X","Bahran",26.1 1 ,"A71","Qatar ",25 1 ,"A51","Bhutan",27 1 ,"A4X","Oman ",23.6 1 ,"A35","Tonga ",-21 1 ,"A22","Btswna",-22 1 ,"9Y","Trindad",10 1 ,"9X","Ruanda ",-2 1 ,"9V","Singpor",1 1 ,"9U","Burundi",-3 1 ,"9Q","R Zaire",1 1 ,"9N","Nepal ",27 1 ,"9M8","Sarwak",2 1 ,"9M6","Sabah ",6 1 ,"9M2","Malay ",6 1 ,"9L","S Leone",8 1 ,"9K","Kuwait ",29 1 ,"9J","Zambia ",-15 1 ,"9H","Malta ",36 1 ,"9G","Ghana ",6 1 ,"8R","Guyana ",7 1 ,"8Q","Maldive",5 1 ,"8P","Barbads",13 1 ,"8N","Japan ",34 1 ,"8J1","JapAnt",-70 1 ,"7Q","Malawi ",-15 1 ,"7P","Lesotho",-30 1 ,"7O","S Yemen",12 1 ,"6Y","Jamaica",18 1 ,"6T","Sudan ",16 1 ,"6O","SomaliR",10 1 ,"6D","Mexico ",20 1 ,"6C","Syria ",35 1 ,"5Z","Kenya ",0 1 ,"5X","Uganda ",0 1 ,"5W","W Samoa",-14 1 ,"5V","TogoRep",7 1 ,"5U","NigerRp",15 1 ,"5T","Maurtna",20 1 ,"5R","Malgasy",-20 1 ,"5N","Nigeria",7 1 ,"5J","Colmbia",4.5 1 ,"5H","Tanznia",-5 1 ,"5B","Cyprus ",35 1 ,"4X","Israel ",32 1 ,"4W","Yemen ",13 1 ,"4V","Haiti ",19 1 ,"4U","UniNats",46 1 ,"4T","Peru ",-12 1 ,"4S","SrLanka",7 1 ,"4N","Yugslav",43 1 ,"4J1","ERusia",56 1 ,"4D","Philipn",15 1 ,"3Y","BouvetI",-55 1 ,"3X","RGuinea",10 1 ,"3V","Tunisia",36 1 ,"3D6","Swazil",-27 1 ,"3D2",-18 1 ,"3D2","Fiji ",-18 1 ,"3C0","Anobon",-1 1 ,"3C","Eq Guin",2 1 ,"3B9","Rodrgz",-20 1 ,"3B8","Maurts",-20 1 ,"3B6","Aglega",-10 1 ,"1S","Spratly",9 1 ,"1A0","SvMalt",36 1 +G(n)*G(n)))) 1 *W(n)/T(n): 1 *S0)*Y8*Y6 1 *(T6-U(n))/(24 1 *(T6-S(n))/T(n)) 1 *(T6-S(n))/T(n) 1 );"ut month ";MN 1 (U(n)-T5))* 1 (U(n)-T5)) 1 (T6-S(n))>(T(n)/2 1 (T5-U(n))*(S(n)-T5)>0 1 (T5-S(n))*(U(n)-T5)>0 1 (S(n)-T5))* 1 (S(n)-T5)) 1 (L9/RCN))/ 1 (L0+Y2)>-.26 1 (HH9*RCN+.5 1 ((U(n)-T6)/2 1 "ZB","Gibrltr",36 1 "XT2","Volt R",12 1 "VS6","H Kong",22 1 "VK9N","Nfolk",-29 1 "UR2","Estona",59 1 "T30","W Kimb",3 1 "Sunspot Number ";S0 1 "Start time ?Eg input 3=0300 ";CH5 1 "S4","Ciskei ",-26 1 "Page No. ";CH4 1 "PJ2","Curaco",12 1 "Longpath Y/N ";O$ 1 "KX6","Marshl",9 1 "J3","Grenada",12 1 "HT","Nicrgua",12 1 "G","England ",51.5 1 "Entry Format No. ";CH1 1 "EL","Liberia",6 1 "Call (or 0 to pageflip) ";U$ 1 "CT1","Portgl",39 1 "AP","Pakistn",25 1 "7X","Algeria",37 1 "5A","Libya ",32 1 "3A","Monaco ",44 1 " Month number ";MN 1 VS6 to 1S " 1 T30 to VS5 " 1 KX to T7 " 1 3A to 9Y " 1 G to KW" 1 A to F"